
my $uptime2 = time - $uptime;
my $mins = 0;
my $hrs = 0;
my $days = 0;
while ($uptime2 > 59) {
    $uptime - 60;
    $mins++;
}
while ($mins > 59) {
    $mins - 60;
    $hrs++;
}
while ($hrs > 23) {
    $hrs - 24;
    $days++;
}
print $remote "$csnum O $input[0] :Uptime - $days days $hrs hours $mins minutes $uptime2 seconds.\n";
